-- GENERATED SPELL FOR [Blood of Agamaggan] --


function spell0_4541(pUnit, Event) --@Curse of Blood,n/a--
pUnit:FullCastSpellOnTarget(8282,pUnit:GetMainTank ())
pUnit:RegisterEvent('Sorts_4541', 2000, 1)
end

function Sorts_4541(pUnit, Event)
local choix_sorts_4541 = math.random(0, 0)
if choix_sorts_4541 == 0 then
pUnit:RegisterEvent('spell0_4541', 1, 1)
end
end

function mob4541_Action(pUnit, Event)
pUnit:RegisterEvent('Sorts_4541', math.random(1500, 3000), 1)
end

function mob4541_Leave(pUnit, Event)
--pUnit:RemoveEvents();--
end

function mob4541_Kill(pUnit, Event)
--pUnit:RemoveEvents();--
end

function mob4541_Die(pUnit, Event)
pUnit:RemoveEvents();
end

RegisterUnitEvent(4541, 1, 'mob4541_Action')
RegisterUnitEvent(4541, 2, 'mob4541_Leave')
RegisterUnitEvent(4541, 3, 'mob4541_Kill')
RegisterUnitEvent(4541, 4, 'mob4541_Die')
